home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1994 July
/
1994-07b.d64
/
run read
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
117b
|
6 lines
10 rem this reads in input line into x$
20 rem
30 x=512:x$=""
40 ifpeek(x)thenx$=x$+chr$(peek(x)):x=x+1:goto40
50 printchr$(34)x$chr$(34)